home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / gfx / edit / AmiCAD_2.07.lha / AmiCAD / ARexx / New.AmiCAD < prev    next >
Text File  |  1998-03-03  |  404b  |  23 lines
  1. /* This file gives you an example for the recommended structure
  2. for a script file called by AmiCAD */
  3.  
  4. options results
  5.  
  6. signal on error     /* for error handling */
  7. signal on syntax
  8.  
  9. /* Your program must be placed there */
  10.  
  11.  
  12. exit
  13.  
  14. /* Handling errors */
  15. syntax:
  16. erreur=RC
  17. 'MESSAGE("Syntax error"+CHR(10)+"in line 'SIGL'"+CHR(10)+"'errortext(erreur)'")'
  18. exit
  19.  
  20. error:
  21. 'MESSAGE("Error in line 'SIGL'")'
  22. exit
  23.